FB/IB: Pridani noveho uzivatele

Otázka od: js-delphi@quick.cz

7. 6. 2004 10:26

Ahoj.
Pomuze mi, pls, nekdo se subjektem? Potrebuju pridat uzivatele programove.
Priklad by mi bodl.
Diky Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol@seznam.cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.0.3
programator amater

Odpovedá: Fedor 'fi0dor' Tirsel

7. 6. 2004 11:13

: Ahoj.
: Pomuze mi, pls, nekdo se subjektem? Potrebuju pridat uzivatele programove.
: Priklad by mi bodl.
: Diky Jirka

Zdravim,

ja to riesim pomocou IBSecurityService, ale ide to aj priamo cez vlozenie
noveho
zaznamu do security.fdb (heslo sa da vygenerovat pomocou UDF -- nedavno o tom
vysiel clanok od p. Skopalika na www.dbsvet.cz, pripadne mozete stiahnut
podobnu
UDF aj odo mna www.fi0dor.info/files/ibase_passwd.zip).

Priklad vlozenia noveho uzivatela:

procedure addNewUser;
var ib_users: TIBSecurityService;
begin
       with ib_users do
        begin
          Active := true;
          SecurityAction := ActionAddUser;

          UserName := cele_meno.text;
          Password := heslo.text;
          FirstName := self.meno.text;
          LastName := self.priezvisko.text;

          //pridam uzivatela
          AddUser;
          Active := false;
        end;
end;

S pozdravom...
--
Fedor 'fi0dor' Tirsel
www.fi0dor.info

Odpovedá: Ing. Marek Kocan

7. 6. 2004 11:00

Ahojky,

> vysiel clanok od p. Skopalika na www.dbsvet.cz, pripadne
mozete stiahnut podobnu

ja jen upresnim URL:

http://www.dbsvet.cz/view.php?cisloclanku=2004041701

KER

Odpovedá: Marek Dostal

7. 6. 2004 11:25

> : Pomuze mi, pls, nekdo se subjektem? Potrebuju pridat uzivatele
programove.
> : Priklad by mi bodl.

Tohle a rada dalsich veci se da vycist ze zdrojoveho kodu IBConsole, ktery
je soucasti uvolnene verze InterBase. IBConsole je napsana v D5.

Marek Dostal
D7Prof, WinXP Home, FireBird 1.0.2